home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2001 June
/
CHIP Haziran 2001.iso
/
prog
/
yerli
/
07
/
_SETUP.1
/
Emlak 2000.exe
/
0
/
RCDATA
/
TFORM16
/
TFORM16.txt
< prev
Wrap
Text File
|
1999-02-04
|
4KB
|
190 lines
object Form16: TForm16
Left = 319
Top = 114
BorderStyle = bsNone
Caption = 'G�sterilen Sat�l�k Emlak Listesi'
ClientHeight = 300
ClientWidth = 300
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Image1: TImage
Left = 0
Top = 0
Width = 300
Height = 300
AutoSize = True
Picture.Data = {<image000.jpg>}
OnMouseDown = Image1MouseDown
end
object Image2: TImage
Left = 32
Top = 240
Width = 113
Height = 38
Picture.Data = {<image001.jpg>}
Stretch = True
Visible = False
end
object Image3: TImage
Left = 160
Top = 240
Width = 113
Height = 38
Picture.Data = {<image002.jpg>}
Stretch = True
Visible = False
end
object Label1: TLabel
Left = 40
Top = 248
Width = 97
Height = 25
Alignment = taCenter
AutoSize = False
Caption = 'Bul'
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
OnMouseDown = Label1MouseDown
OnMouseUp = Label1MouseUp
end
object Label2: TLabel
Left = 168
Top = 248
Width = 97
Height = 25
Alignment = taCenter
AutoSize = False
Caption = '��k��'
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
OnMouseDown = Label2MouseDown
OnMouseUp = Label2MouseUp
end
object Label3: TLabel
Left = 32
Top = 224
Width = 46
Height = 13
Caption = 'Ad Soyad'
Transparent = True
Visible = False
end
object SpeedButton1: TSpeedButton
Left = 224
Top = 216
Width = 41
Height = 21
Caption = 'T�m�'
OnClick = SpeedButton1Click
end
object DBGrid1: TDBGrid
Left = 32
Top = 64
Width = 241
Height = 145
DataSource = DataSource1
FixedColor = 8750469
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
Columns = <
item
Expanded = False
FieldName = 'AdiSoyadi'
Width = 119
Visible = True
end
item
Expanded = False
FieldName = 'Tarih'
Width = 91
Visible = True
end>
end
object Edit1: TEdit
Left = 88
Top = 216
Width = 121
Height = 21
TabOrder = 1
end
object DataSource1: TDataSource
DataSet = Query1
Left = 80
Top = 8
end
object Query1: TQuery
Active = True
SQL.Strings = (
'select * from gosterilensd')
Left = 112
Top = 8
object Query1AdiSoyadi: TStringField
FieldName = 'AdiSoyadi'
end
object Query1Tarih: TStringField
FieldName = 'Tarih'
Size = 10
end
object Query1EvTel: TStringField
FieldName = 'Ev Tel'
end
object Query1IsTel: TStringField
FieldName = 'IsTel'
end
object Query1Ceptel: TStringField
FieldName = 'Ceptel'
end
object Query1Adres: TMemoField
FieldName = 'Adres'
BlobType = ftMemo
Size = 50
end
object Query1G1: TMemoField
FieldName = 'G1'
BlobType = ftMemo
Size = 50
end
object Query1G2: TMemoField
FieldName = 'G2'
BlobType = ftMemo
Size = 50
end
object Query1G3: TMemoField
FieldName = 'G3'
BlobType = ftMemo
Size = 50
end
object Query1G4: TMemoField
FieldName = 'G4'
BlobType = ftMemo
Size = 50
end
object Query1Gosterilensno: TIntegerField
FieldName = 'Gosterilensno'
end
end
end